home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / HyperCard 2.0 / HyperCard / HyperCard.rsrc / CODE_17_EditPattern.txt < prev    next >
Text File  |  1990-08-31  |  51KB  |  897 lines
  1. # near model CODE resource
  2. # jump table entries: 6080-6083 (4 of them)
  3. fn00000000:
  4. 00000000  4E56 0000                link       A6, 0
  5. 00000004  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  6. 00000008  A972                     syscall    GetMouse
  7. 0000000A  206E 000C                movea.l    A0, [A6 + 0xC]
  8. 0000000E  2F08                     move.l     -[A7], A0
  9. 00000010  4267                     clr.w      -[A7]
  10. 00000012  226E 000C                movea.l    A1, [A6 + 0xC]
  11. 00000016  3029 0002                move.w     D0, [A1 + 0x2]
  12. 0000001A  226E 0008                movea.l    A1, [A6 + 0x8]
  13. 0000001E  9069 FFE0                sub.w      D0, [A1 - 0x20]
  14. 00000022  48C0                     ext.l      D0
  15. 00000024  81FC 0008                divs.w     D0, 0x8
  16. 00000028  3F00                     move.w     -[A7], D0
  17. 0000002A  2F3C 0007 0000           move.l     -[A7], 0x70000
  18. 00000030  4EAD 245A                jsr        [A5 + 0x245A /* export_1159 */]
  19. 00000034  301F                     move.w     D0, [A7]+
  20. 00000036  205F                     movea.l    A0, [A7]+
  21. 00000038  3140 0002                move.w     [A0 + 0x2], D0
  22. 0000003C  206E 000C                movea.l    A0, [A6 + 0xC]
  23. 00000040  2F08                     move.l     -[A7], A0
  24. 00000042  4267                     clr.w      -[A7]
  25. 00000044  226E 000C                movea.l    A1, [A6 + 0xC]
  26. 00000048  3011                     move.w     D0, [A1]
  27. 0000004A  226E 0008                movea.l    A1, [A6 + 0x8]
  28. 0000004E  9069 FFDE                sub.w      D0, [A1 - 0x22]
  29. 00000052  48C0                     ext.l      D0
  30. 00000054  81FC 0008                divs.w     D0, 0x8
  31. 00000058  3F00                     move.w     -[A7], D0
  32. 0000005A  2F3C 0007 0000           move.l     -[A7], 0x70000
  33. 00000060  4EAD 245A                jsr        [A5 + 0x245A /* export_1159 */]
  34. 00000064  301F                     move.w     D0, [A7]+
  35. 00000066  205F                     movea.l    A0, [A7]+
  36. 00000068  3080                     move.w     [A0], D0
  37. 0000006A  4E5E                     unlink     A6
  38. 0000006C  205F                     movea.l    A0, [A7]+
  39. 0000006E  504F                     addq.w     A7, 8
  40. 00000070  4ED0                     jmp        [A0]
  41. fn00000072:
  42. 00000072  4E56 FFF8                link       A6, -0x0008
  43. 00000076  302E 000E                move.w     D0, [A6 + 0xE]
  44. 0000007A  E740                     asl        D0.w, 3
  45. 0000007C  206E 0008                movea.l    A0, [A6 + 0x8]
  46. 00000080  D068 FFE0                add.w      D0, [A0 - 0x20]
  47. 00000084  3D40 FFFA                move.w     [A6 - 0x6], D0
  48. 00000088  5E40                     addq.w     D0, 7
  49. 0000008A  3D40 FFFE                move.w     [A6 - 0x2], D0
  50. 0000008E  302E 000C                move.w     D0, [A6 + 0xC]
  51. 00000092  E740                     asl        D0.w, 3
  52. 00000094  206E 0008                movea.l    A0, [A6 + 0x8]
  53. 00000098  D068 FFDE                add.w      D0, [A0 - 0x22]
  54. 0000009C  3D40 FFF8                move.w     [A6 - 0x8], D0
  55. 000000A0  5E40                     addq.w     D0, 7
  56. 000000A2  3D40 FFFC                move.w     [A6 - 0x4], D0
  57. 000000A6  486E FFF8                pea.l      [A6 - 0x8]
  58. 000000AA  A8A2                     syscall    PaintRect
  59. 000000AC  4E5E                     unlink     A6
  60. 000000AE  205F                     movea.l    A0, [A7]+
  61. 000000B0  504F                     addq.w     A7, 8
  62. 000000B2  4ED0                     jmp        [A0]
  63. fn000000B4:
  64. 000000B4  4E56 FFFA                link       A6, -0x0006
  65. 000000B8  48E7 0708                movem.l    -[A7], D5,D6,D7,A4
  66. 000000BC  286E 0008                movea.l    A4, [A6 + 0x8]
  67. 000000C0  4245                     clr.w      D5
  68. 000000C2  4247                     clr.w      D7
  69. 000000C4  602E                     bra        +0x30 /* 000000F4 */
  70. label000000C6:
  71. 000000C6  4246                     clr.w      D6
  72. 000000C8  6022                     bra        +0x24 /* 000000EC */
  73. label000000CA:
  74. 000000CA  4267                     clr.w      -[A7]
  75. 000000CC  486C FFD2                pea.l      [A4 - 0x2E]
  76. 000000D0  3005                     move.w     D0, D5
  77. 000000D2  48C0                     ext.l      D0
  78. 000000D4  2F00                     move.l     -[A7], D0
  79. 000000D6  A85D                     syscall    BitTst
  80. 000000D8  101F                     move.b     D0, [A7]+
  81. 000000DA  670C                     beq        +0xE /* 000000E8 */
  82. 000000DC  3F06                     move.w     -[A7], D6
  83. 000000DE  3F07                     move.w     -[A7], D7
  84. 000000E0  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  85. 000000E4  4EBA FF8C                jsr        [PC - 0x74 /* 00000072 */]
  86. label000000E8:
  87. 000000E8  5245                     addq.w     D5, 1
  88. 000000EA  5246                     addq.w     D6, 1
  89. label000000EC:
  90. 000000EC  7007                     moveq.l    D0, 0x07
  91. 000000EE  B046                     cmp.w      D0, D6
  92. 000000F0  6CD8                     bge        -0x26 /* 000000CA */
  93. 000000F2  5247                     addq.w     D7, 1
  94. label000000F4:
  95. 000000F4  7007                     moveq.l    D0, 0x07
  96. 000000F6  B047                     cmp.w      D0, D7
  97. 000000F8  6CCC                     bge        -0x32 /* 000000C6 */
  98. 000000FA  486C FFE6                pea.l      [A4 - 0x1A]
  99. 000000FE  486C FFD2                pea.l      [A4 - 0x2E]
  100. 00000102  A8A5                     syscall    FillRect
  101. 00000104  4CDF 10E0                movem.l    D5,D6,D7,A4, [A7]+
  102. 00000108  4E5E                     unlink     A6
  103. 0000010A  2E9F                     move.l     [A7], [A7]+
  104. 0000010C  4E75                     rts
  105. export_760:
  106. 0000010E  4E56 FFB0                link       A6, -0x0050
  107. 00000112  48E7 0F00                movem.l    -[A7], D4,D5,D6,D7
  108. 00000116  102D ACA6                move.b     D0, [A5 - 0x535A]
  109. 0000011A  6704                     beq        +0x6 /* 00000120 */
  110. 0000011C  6000 034A                bra        +0x34C /* 00000468 */
  111. label00000120:
  112. 00000120  486E FFDA                pea.l      [A6 - 0x26]
  113. 00000124  A874                     syscall    GetPort
  114. 00000126  4EAD 1D22                jsr        [A5 + 0x1D22 /* export_928 */]
  115. 0000012A  42A7                     clr.l      -[A7]
  116. 0000012C  3F3C 00A3                move.w     -[A7], 0xA3
  117. 00000130  42A7                     clr.l      -[A7]
  118. 00000132  70FF                     moveq.l    D0, 0xFFFFFFFF
  119. 00000134  2F00                     move.l     -[A7], D0
  120. 00000136  4EAD 1E62                jsr        [A5 + 0x1E62 /* export_968 */]
  121. 0000013A  2D5F FFFC                move.l     [A6 - 0x4], [A7]+
  122. 0000013E  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  123. 00000142  2F3C 0002 0000           move.l     -[A7], 0x20000
  124. 00000148  1F3C 0001                move.b     -[A7], 0x1
  125. 0000014C  4EAD 1CCA                jsr        [A5 + 0x1CCA /* export_917 */]
  126. 00000150  42A7                     clr.l      -[A7]
  127. 00000152  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  128. 00000156  A917                     syscall    GetWRefCon
  129. 00000158  205F                     movea.l    A0, [A7]+
  130. 0000015A  2050                     movea.l    A0, [A0]
  131. 0000015C  43ED 20BA                lea.l      A1, [A5 + 0x20BA /* export_1043 */]
  132. 00000160  2149 0006                move.l     [A0 + 0x6], A1
  133. 00000164  A89E                     syscall    PenNormal
  134. 00000166  486E FFDE                pea.l      [A6 - 0x22]
  135. 0000016A  2F3C 000F 000F           move.l     -[A7], 0xF000F
  136. 00000170  2F3C 0050 0050           move.l     -[A7], 0x500050 /* 'P\0P' */
  137. 00000176  A8A7                     syscall    SetRect
  138. 00000178  486E FFE6                pea.l      [A6 - 0x1A]
  139. 0000017C  2F3C 000F 005F           move.l     -[A7], 0xF005F
  140. 00000182  2F3C 0050 00A0           move.l     -[A7], 0x5000A0
  141. 00000188  A8A7                     syscall    SetRect
  142. 0000018A  486E FFDE                pea.l      [A6 - 0x22]
  143. 0000018E  A8A1                     syscall    FrameRect
  144. 00000190  486E FFE6                pea.l      [A6 - 0x1A]
  145. 00000194  A8A1                     syscall    FrameRect
  146. 00000196  486E FFDE                pea.l      [A6 - 0x22]
  147. 0000019A  2F3C 0001 0001           move.l     -[A7], 0x10001
  148. 000001A0  A8A9                     syscall    InsetRect
  149. 000001A2  486E FFE6                pea.l      [A6 - 0x1A]
  150. 000001A6  2F3C 0001 0001           move.l     -[A7], 0x10001
  151. 000001AC  A8A9                     syscall    InsetRect
  152. 000001AE  302D C586                move.w     D0, [A5 - 0x3A7A]
  153. 000001B2  5340                     subq.w     D0, 1
  154. 000001B4  41ED A950                lea.l      A0, [A5 - 0x56B0]
  155. 000001B8  E740                     asl        D0.w, 3
  156. 000001BA  43EE FFD2                lea.l      A1, [A6 - 0x2E]
  157. 000001BE  41F0 0000                lea.l      A0, [A0 + D0.w]
  158. 000001C2  22D8                     move.l     [A1]+, [A0]+
  159. 000001C4  22D8                     move.l     [A1]+, [A0]+
  160. 000001C6  2F0E                     move.l     -[A7], A6
  161. 000001C8  4EBA FEEA                jsr        [PC - 0x116 /* 000000B4 */]
  162. 000001CC  41EE FFB0                lea.l      A0, [A6 - 0x50]
  163. 000001D0  43ED FE14                lea.l      A1, [A5 - 0x1EC]
  164. 000001D4  20D9                     move.l     [A0]+, [A1]+
  165. 000001D6  20D9                     move.l     [A0]+, [A1]+
  166. 000001D8  486E FFB0                pea.l      [A6 - 0x50]
  167. 000001DC  2F3C 0005 0005           move.l     -[A7], 0x50005
  168. 000001E2  A8A9                     syscall    InsetRect
  169. label000001E4:
  170. 000001E4  486D 1D42                pea.l      [A5 + 0x1D42 /* export_932 */]
  171. 000001E8  486E FFFA                pea.l      [A6 - 0x6]
  172. 000001EC  A991                     syscall    ModalDialog
  173. 000001EE  302E FFFA                move.w     D0, [A6 - 0x6]
  174. 000001F2  5340                     subq.w     D0, 1
  175. 000001F4  6712                     beq        +0x14 /* 00000208 */
  176. 000001F6  5340                     subq.w     D0, 1
  177. 000001F8  6754                     beq        +0x56 /* 0000024E */
  178. 000001FA  5340                     subq.w     D0, 1
  179. 000001FC  6754                     beq        +0x56 /* 00000252 */
  180. 000001FE  5340                     subq.w     D0, 1
  181. 00000200  6700 011A                beq        +0x11C /* 0000031C */
  182. 00000204  6000 0236                bra        +0x238 /* 0000043C */
  183. label00000208:
  184. 00000208  4267                     clr.w      -[A7]
  185. 0000020A  486E FFD2                pea.l      [A6 - 0x2E]
  186. 0000020E  486D BB10                pea.l      [A5 - 0x44F0]
  187. 00000212  4EAD 1B7A                jsr        [A5 + 0x1B7A /* export_875 */]
  188. 00000216  101F                     move.b     D0, [A7]+
  189. 00000218  6630                     bne        +0x32 /* 0000024A */
  190. 0000021A  41ED BB10                lea.l      A0, [A5 - 0x44F0]
  191. 0000021E  43EE FFD2                lea.l      A1, [A6 - 0x2E]
  192. 00000222  20D9                     move.l     [A0]+, [A1]+
  193. 00000224  20D9                     move.l     [A0]+, [A1]+
  194. 00000226  302D C586                move.w     D0, [A5 - 0x3A7A]
  195. 0000022A  5340                     subq.w     D0, 1
  196. 0000022C  41ED A950                lea.l      A0, [A5 - 0x56B0]
  197. 00000230  E740                     asl        D0.w, 3
  198. 00000232  41F0 0000                lea.l      A0, [A0 + D0.w]
  199. 00000236  43ED BB10                lea.l      A1, [A5 - 0x44F0]
  200. 0000023A  20D9                     move.l     [A0]+, [A1]+
  201. 0000023C  20D9                     move.l     [A0]+, [A1]+
  202. 0000023E  1B7C 0001 AD7A           move.b     [A5 - 0x5286], 0x1
  203. 00000244  1B7C 0001 C416           move.b     [A5 - 0x3BEA], 0x1
  204. label0000024A:
  205. 0000024A  6000 01F0                bra        +0x1F2 /* 0000043C */
  206. label0000024E:
  207. 0000024E  6000 01EC                bra        +0x1EE /* 0000043C */
  208. label00000252:
  209. 00000252  486E FFCE                pea.l      [A6 - 0x32]
  210. 00000256  2F0E                     move.l     -[A7], A6
  211. 00000258  4EBA FDA6                jsr        [PC - 0x25A /* 00000000 */]
  212. 0000025C  302E FFCE                move.w     D0, [A6 - 0x32]
  213. 00000260  E740                     asl        D0.w, 3
  214. 00000262  322E FFD0                move.w     D1, [A6 - 0x30]
  215. 00000266  D240                     add.w      D1, D0
  216. 00000268  48C1                     ext.l      D1
  217. 0000026A  2E01                     move.l     D7, D1
  218. 0000026C  4267                     clr.w      -[A7]
  219. 0000026E  486E FFD2                pea.l      [A6 - 0x2E]
  220. 00000272  2F07                     move.l     -[A7], D7
  221. 00000274  A85D                     syscall    BitTst
  222. 00000276  1A1F                     move.b     D5, [A7]+
  223. 00000278  A89E                     syscall    PenNormal
  224. 0000027A  1005                     move.b     D0, D5
  225. 0000027C  6706                     beq        +0x8 /* 00000284 */
  226. 0000027E  486D FE80                pea.l      [A5 - 0x180]
  227. 00000282  A89D                     syscall    PenPat
  228. label00000284:
  229. 00000284  2F2E FFCE                move.l     -[A7], [A6 - 0x32]
  230. 00000288  2F0E                     move.l     -[A7], A6
  231. 0000028A  4EBA FDE6                jsr        [PC - 0x21A /* 00000072 */]
  232. 0000028E  1005                     move.b     D0, D5
  233. 00000290  670A                     beq        +0xC /* 0000029C */
  234. 00000292  486E FFD2                pea.l      [A6 - 0x2E]
  235. 00000296  2F07                     move.l     -[A7], D7
  236. 00000298  A85F                     syscall    BitClr
  237. 0000029A  6008                     bra        +0xA /* 000002A4 */
  238. label0000029C:
  239. 0000029C  486E FFD2                pea.l      [A6 - 0x2E]
  240. 000002A0  2F07                     move.l     -[A7], D7
  241. 000002A2  A85E                     syscall    BitSet
  242. label000002A4:
  243. 000002A4  486E FFE6                pea.l      [A6 - 0x1A]
  244. 000002A8  486E FFD2                pea.l      [A6 - 0x2E]
  245. 000002AC  A8A5                     syscall    FillRect
  246. label000002AE:
  247. 000002AE  486E FFCA                pea.l      [A6 - 0x36]
  248. 000002B2  2F0E                     move.l     -[A7], A6
  249. 000002B4  4EBA FD4A                jsr        [PC - 0x2B6 /* 00000000 */]
  250. 000002B8  4267                     clr.w      -[A7]
  251. 000002BA  2F2E FFCE                move.l     -[A7], [A6 - 0x32]
  252. 000002BE  2F2E FFCA                move.l     -[A7], [A6 - 0x36]
  253. 000002C2  A881                     syscall    EqualPt
  254. 000002C4  101F                     move.b     D0, [A7]+
  255. 000002C6  6640                     bne        +0x42 /* 00000308 */
  256. 000002C8  2F2E FFCA                move.l     -[A7], [A6 - 0x36]
  257. 000002CC  2F0E                     move.l     -[A7], A6
  258. 000002CE  4EBA FDA2                jsr        [PC - 0x25E /* 00000072 */]
  259. 000002D2  302E FFCA                move.w     D0, [A6 - 0x36]
  260. 000002D6  E740                     asl        D0.w, 3
  261. 000002D8  322E FFCC                move.w     D1, [A6 - 0x34]
  262. 000002DC  D240                     add.w      D1, D0
  263. 000002DE  48C1                     ext.l      D1
  264. 000002E0  2E01                     move.l     D7, D1
  265. 000002E2  1005                     move.b     D0, D5
  266. 000002E4  670A                     beq        +0xC /* 000002F0 */
  267. 000002E6  486E FFD2                pea.l      [A6 - 0x2E]
  268. 000002EA  2F07                     move.l     -[A7], D7
  269. 000002EC  A85F                     syscall    BitClr
  270. 000002EE  6008                     bra        +0xA /* 000002F8 */
  271. label000002F0:
  272. 000002F0  486E FFD2                pea.l      [A6 - 0x2E]
  273. 000002F4  2F07                     move.l     -[A7], D7
  274. 000002F6  A85E                     syscall    BitSet
  275. label000002F8:
  276. 000002F8  486E FFE6                pea.l      [A6 - 0x1A]
  277. 000002FC  486E FFD2                pea.l      [A6 - 0x2E]
  278. 00000300  A8A5                     syscall    FillRect
  279. 00000302  2D6E FFCA FFCE           move.l     [A6 - 0x32], [A6 - 0x36]
  280. label00000308:
  281. 00000308  4267                     clr.w      -[A7]
  282. 0000030A  4EAD 206A                jsr        [A5 + 0x206A /* export_1033 */]
  283. 0000030E  101F                     move.b     D0, [A7]+
  284. 00000310  0A00 0001                xori.b     D0, 0x1
  285. 00000314  6798                     beq        -0x66 /* 000002AE */
  286. 00000316  A89E                     syscall    PenNormal
  287. 00000318  6000 0122                bra        +0x124 /* 0000043C */
  288. label0000031C:
  289. 0000031C  41EE FFD2                lea.l      A0, [A6 - 0x2E]
  290. 00000320  43ED FE80                lea.l      A1, [A5 - 0x180]
  291. 00000324  20D9                     move.l     [A0]+, [A1]+
  292. 00000326  20D9                     move.l     [A0]+, [A1]+
  293. 00000328  4267                     clr.w      -[A7]
  294. 0000032A  2F2D B760                move.l     -[A7], [A5 - 0x48A0]
  295. 0000032E  486E FFB8                pea.l      [A6 - 0x48]
  296. 00000332  A92C                     syscall    FindWindow
  297. 00000334  3D5F FFBC                move.w     [A6 - 0x44], [A7]+
  298. 00000338  2F2E FFB8                move.l     -[A7], [A6 - 0x48]
  299. 0000033C  A873                     syscall    SetPort
  300. 0000033E  486D B760                pea.l      [A5 - 0x48A0]
  301. 00000342  A871                     syscall    GlobalToLocal
  302. 00000344  202E FFB8                move.l     D0, [A6 - 0x48]
  303. 00000348  B0AD B740                cmp.l      D0, [A5 - 0x48C0]
  304. 0000034C  57C0                     seq        D0
  305. 0000034E  7203                     moveq.l    D1, 0x03
  306. 00000350  B26E FFBC                cmp.w      D1, [A6 - 0x44]
  307. 00000354  57C1                     seq        D1
  308. 00000356  C001                     and.b      D0, D1
  309. 00000358  6752                     beq        +0x54 /* 000003AC */
  310. 0000035A  302D B762                move.w     D0, [A5 - 0x489E]
  311. 0000035E  48C0                     ext.l      D0
  312. 00000360  81FC 0012                divs.w     D0, 0x12
  313. 00000364  3D40 FFC2                move.w     [A6 - 0x3E], D0
  314. 00000368  302D B760                move.w     D0, [A5 - 0x48A0]
  315. 0000036C  48C0                     ext.l      D0
  316. 0000036E  81FC 000D                divs.w     D0, 0xD /* '\r' */
  317. 00000372  3C00                     move.w     D6, D0
  318. 00000374  4A46                     tst.w      D6
  319. 00000376  6C02                     bge        +0x4 /* 0000037A */
  320. 00000378  4246                     clr.w      D6
  321. label0000037A:
  322. 0000037A  7009                     moveq.l    D0, 0x09
  323. 0000037C  B046                     cmp.w      D0, D6
  324. 0000037E  6C02                     bge        +0x4 /* 00000382 */
  325. 00000380  7C09                     moveq.l    D6, 0x09
  326. label00000382:
  327. 00000382  3006                     move.w     D0, D6
  328. 00000384  5240                     addq.w     D0, 1
  329. 00000386  720A                     moveq.l    D1, 0x0A
  330. 00000388  C3EE FFC2                muls.w     D1, [A6 - 0x3E]
  331. 0000038C  D240                     add.w      D1, D0
  332. 0000038E  3D41 FFBE                move.w     [A6 - 0x42], D1
  333. 00000392  302E FFBE                move.w     D0, [A6 - 0x42]
  334. 00000396  5340                     subq.w     D0, 1
  335. 00000398  41ED A950                lea.l      A0, [A5 - 0x56B0]
  336. 0000039C  E740                     asl        D0.w, 3
  337. 0000039E  43EE FFD2                lea.l      A1, [A6 - 0x2E]
  338. 000003A2  41F0 0000                lea.l      A0, [A0 + D0.w]
  339. 000003A6  22D8                     move.l     [A1]+, [A0]+
  340. 000003A8  22D8                     move.l     [A1]+, [A0]+
  341. 000003AA  6078                     bra        +0x7A /* 00000424 */
  342. label000003AC:
  343. 000003AC  4267                     clr.w      -[A7]
  344. 000003AE  302D B762                move.w     D0, [A5 - 0x489E]
  345. 000003B2  5840                     addq.w     D0, 4
  346. 000003B4  3F00                     move.w     -[A7], D0
  347. 000003B6  4EAD 252A                jsr        [A5 + 0x252A /* export_1185 */]
  348. 000003BA  3B5F B762                move.w     [A5 - 0x489E], [A7]+
  349. 000003BE  4267                     clr.w      -[A7]
  350. 000003C0  302D B760                move.w     D0, [A5 - 0x48A0]
  351. 000003C4  5840                     addq.w     D0, 4
  352. 000003C6  3F00                     move.w     -[A7], D0
  353. 000003C8  4EAD 252A                jsr        [A5 + 0x252A /* export_1185 */]
  354. 000003CC  3B5F B760                move.w     [A5 - 0x48A0], [A7]+
  355. 000003D0  4267                     clr.w      -[A7]
  356. 000003D2  2F2D B760                move.l     -[A7], [A5 - 0x48A0]
  357. 000003D6  486E FFB0                pea.l      [A6 - 0x50]
  358. 000003DA  A8AD                     syscall    PtInRect
  359. 000003DC  101F                     move.b     D0, [A7]+
  360. 000003DE  6744                     beq        +0x46 /* 00000424 */
  361. 000003E0  7E00                     moveq.l    D7, 0x00
  362. 000003E2  4244                     clr.w      D4
  363. 000003E4  6038                     bra        +0x3A /* 0000041E */
  364. label000003E6:
  365. 000003E6  426E FFF6                clr.w      [A6 - 0xA]
  366. 000003EA  6028                     bra        +0x2A /* 00000414 */
  367. label000003EC:
  368. 000003EC  4267                     clr.w      -[A7]
  369. 000003EE  302E FFF6                move.w     D0, [A6 - 0xA]
  370. 000003F2  D06D B762                add.w      D0, [A5 - 0x489E]
  371. 000003F6  3F00                     move.w     -[A7], D0
  372. 000003F8  3004                     move.w     D0, D4
  373. 000003FA  D06D B760                add.w      D0, [A5 - 0x48A0]
  374. 000003FE  3F00                     move.w     -[A7], D0
  375. 00000400  A865                     syscall    GetPixel
  376. 00000402  101F                     move.b     D0, [A7]+
  377. 00000404  6708                     beq        +0xA /* 0000040E */
  378. 00000406  486E FFD2                pea.l      [A6 - 0x2E]
  379. 0000040A  2F07                     move.l     -[A7], D7
  380. 0000040C  A85E                     syscall    BitSet
  381. label0000040E:
  382. 0000040E  5287                     addq.l     D7, 1
  383. 00000410  526E FFF6                addq.w     [A6 - 0xA], 1
  384. label00000414:
  385. 00000414  7007                     moveq.l    D0, 0x07
  386. 00000416  B06E FFF6                cmp.w      D0, [A6 - 0xA]
  387. 0000041A  6CD0                     bge        -0x2E /* 000003EC */
  388. 0000041C  5244                     addq.w     D4, 1
  389. label0000041E:
  390. 0000041E  7007                     moveq.l    D0, 0x07
  391. 00000420  B044                     cmp.w      D0, D4
  392. 00000422  6CC2                     bge        -0x3C /* 000003E6 */
  393. label00000424:
  394. 00000424  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  395. 00000428  A873                     syscall    SetPort
  396. 0000042A  486E FFDE                pea.l      [A6 - 0x22]
  397. 0000042E  A8A3                     syscall    EraseRect
  398. 00000430  486E FFE6                pea.l      [A6 - 0x1A]
  399. 00000434  A8A3                     syscall    EraseRect
  400. 00000436  2F0E                     move.l     -[A7], A6
  401. 00000438  4EBA FC7A                jsr        [PC - 0x386 /* 000000B4 */]
  402. label0000043C:
  403. 0000043C  7001                     moveq.l    D0, 0x01
  404. 0000043E  B06E FFFA                cmp.w      D0, [A6 - 0x6]
  405. 00000442  57C0                     seq        D0
  406. 00000444  7202                     moveq.l    D1, 0x02
  407. 00000446  B26E FFFA                cmp.w      D1, [A6 - 0x6]
  408. 0000044A  57C1                     seq        D1
  409. 0000044C  8001                     or.b       D0, D1
  410. 0000044E  6700 FD94                beq        -0x26A /* 000001E4 */
  411. 00000452  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  412. 00000456  4EAD 1CAA                jsr        [A5 + 0x1CAA /* export_913 */]
  413. 0000045A  486E FFFC                pea.l      [A6 - 0x4]
  414. 0000045E  4EAD 2AFA                jsr        [A5 + 0x2AFA /* export_1371 */]
  415. 00000462  2F2E FFDA                move.l     -[A7], [A6 - 0x26]
  416. 00000466  A873                     syscall    SetPort
  417. label00000468:
  418. 00000468  4CDF 00F0                movem.l    D4,D5,D6,D7, [A7]+
  419. 0000046C  4E5E                     unlink     A6
  420. 0000046E  4E75                     rts
  421. fn00000470:
  422. 00000470  4E56 FFF8                link       A6, -0x0008
  423. 00000474  206E 0008                movea.l    A0, [A6 + 0x8]
  424. 00000478  3028 FFF8                move.w     D0, [A0 - 0x8]
  425. 0000047C  EB40                     asl        D0.w, 5
  426. 0000047E  D07C 0010                add.w      D0, 0x10
  427. 00000482  3D40 FFFA                move.w     [A6 - 0x6], D0
  428. 00000486  D07C 0020                add.w      D0, 0x20 /* ' ' */
  429. 0000048A  3D40 FFFE                move.w     [A6 - 0x2], D0
  430. 0000048E  206E 0008                movea.l    A0, [A6 + 0x8]
  431. 00000492  3028 FFF6                move.w     D0, [A0 - 0xA]
  432. 00000496  EB40                     asl        D0.w, 5
  433. 00000498  D07C 0010                add.w      D0, 0x10
  434. 0000049C  3D40 FFF8                move.w     [A6 - 0x8], D0
  435. 000004A0  D07C 0020                add.w      D0, 0x20 /* ' ' */
  436. 000004A4  3D40 FFFC                move.w     [A6 - 0x4], D0
  437. 000004A8  486E FFF8                pea.l      [A6 - 0x8]
  438. 000004AC  4EAD 0912                jsr        [A5 + 0x912 /* export_286 */]
  439. 000004B0  4E5E                     unlink     A6
  440. 000004B2  2E9F                     move.l     [A7], [A7]+
  441. 000004B4  4E75                     rts
  442. export_761:
  443. 000004B6  4E56 FFEC                link       A6, -0x0014
  444. 000004BA  48E7 0700                movem.l    -[A7], D5,D6,D7
  445. 000004BE  4EAD 07D2                jsr        [A5 + 0x7D2 /* export_246 */]
  446. 000004C2  4EAD 1D22                jsr        [A5 + 0x1D22 /* export_928 */]
  447. 000004C6  42A7                     clr.l      -[A7]
  448. 000004C8  3F3C 00A4                move.w     -[A7], 0xA4
  449. 000004CC  42A7                     clr.l      -[A7]
  450. 000004CE  70FF                     moveq.l    D0, 0xFFFFFFFF
  451. 000004D0  2F00                     move.l     -[A7], D0
  452. 000004D2  4EAD 1E62                jsr        [A5 + 0x1E62 /* export_968 */]
  453. 000004D6  2D5F FFFC                move.l     [A6 - 0x4], [A7]+
  454. 000004DA  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  455. 000004DE  2F3C 0001 0000           move.l     -[A7], 0x10000
  456. 000004E4  1F3C 0001                move.b     -[A7], 0x1
  457. 000004E8  4EAD 1CCA                jsr        [A5 + 0x1CCA /* export_917 */]
  458. 000004EC  4EAD 21F2                jsr        [A5 + 0x21F2 /* export_1082 */]
  459. 000004F0  7E78                     moveq.l    D7, 0x78
  460. 000004F2  7C18                     moveq.l    D6, 0x18
  461. 000004F4  426E FFF8                clr.w      [A6 - 0x8]
  462. 000004F8  6032                     bra        +0x34 /* 0000052C */
  463. label000004FA:
  464. 000004FA  7A18                     moveq.l    D5, 0x18
  465. 000004FC  426E FFF6                clr.w      [A6 - 0xA]
  466. 00000500  601A                     bra        +0x1C /* 0000051C */
  467. label00000502:
  468. 00000502  3F06                     move.w     -[A7], D6
  469. 00000504  3005                     move.w     D0, D5
  470. 00000506  D07C 0010                add.w      D0, 0x10
  471. 0000050A  3F00                     move.w     -[A7], D0
  472. 0000050C  A893                     syscall    MoveTo
  473. 0000050E  3F07                     move.w     -[A7], D7
  474. 00000510  A883                     syscall    DrawChar
  475. 00000512  DA7C 0020                add.w      D5, 0x20 /* ' ' */
  476. 00000516  5247                     addq.w     D7, 1
  477. 00000518  526E FFF6                addq.w     [A6 - 0xA], 1
  478. label0000051C:
  479. 0000051C  7003                     moveq.l    D0, 0x03
  480. 0000051E  B06E FFF6                cmp.w      D0, [A6 - 0xA]
  481. 00000522  6CDE                     bge        -0x20 /* 00000502 */
  482. 00000524  DC7C 0020                add.w      D6, 0x20 /* ' ' */
  483. 00000528  526E FFF8                addq.w     [A6 - 0x8], 1
  484. label0000052C:
  485. 0000052C  7007                     moveq.l    D0, 0x07
  486. 0000052E  B06E FFF8                cmp.w      D0, [A6 - 0x8]
  487. 00000532  6CC6                     bge        -0x38 /* 000004FA */
  488. 00000534  4EAD 2132                jsr        [A5 + 0x2132 /* export_1058 */]
  489. 00000538  302D BAEE                move.w     D0, [A5 - 0x4512]
  490. 0000053C  5340                     subq.w     D0, 1
  491. 0000053E  48C0                     ext.l      D0
  492. 00000540  81FC 0004                divs.w     D0, 0x4
  493. 00000544  3D40 FFF8                move.w     [A6 - 0x8], D0
  494. 00000548  7000                     moveq.l    D0, 0x00
  495. 0000054A  322D BAEE                move.w     D1, [A5 - 0x4512]
  496. 0000054E  5341                     subq.w     D1, 1
  497. 00000550  3001                     move.w     D0, D1
  498. 00000552  C0BC 0000 0003           and.l      D0, 0x3
  499. 00000558  3D40 FFF6                move.w     [A6 - 0xA], D0
  500. 0000055C  2F0E                     move.l     -[A7], A6
  501. 0000055E  4EBA FF10                jsr        [PC - 0xF0 /* 00000470 */]
  502. label00000562:
  503. 00000562  486D 1D42                pea.l      [A5 + 0x1D42 /* export_932 */]
  504. 00000566  486E FFFA                pea.l      [A6 - 0x6]
  505. 0000056A  A991                     syscall    ModalDialog
  506. 0000056C  7002                     moveq.l    D0, 0x02
  507. 0000056E  B06E FFFA                cmp.w      D0, [A6 - 0x6]
  508. 00000572  6670                     bne        +0x72 /* 000005E4 */
  509. 00000574  486E FFF2                pea.l      [A6 - 0xE]
  510. 00000578  4EAD 202A                jsr        [A5 + 0x202A /* export_1025 */]
  511. 0000057C  2F0E                     move.l     -[A7], A6
  512. 0000057E  4EBA FEF0                jsr        [PC - 0x110 /* 00000470 */]
  513. 00000582  4267                     clr.w      -[A7]
  514. 00000584  302E FFF2                move.w     D0, [A6 - 0xE]
  515. 00000588  907C 0010                sub.w      D0, 0x10
  516. 0000058C  48C0                     ext.l      D0
  517. 0000058E  81FC 0020                divs.w     D0, 0x20 /* ' ' */
  518. 00000592  3F00                     move.w     -[A7], D0
  519. 00000594  2F3C 0003 0000           move.l     -[A7], 0x30000
  520. 0000059A  4EAD 245A                jsr        [A5 + 0x245A /* export_1159 */]
  521. 0000059E  3D5F FFF6                move.w     [A6 - 0xA], [A7]+
  522. 000005A2  4267                     clr.w      -[A7]
  523. 000005A4  302E FFF4                move.w     D0, [A6 - 0xC]
  524. 000005A8  907C 0010                sub.w      D0, 0x10
  525. 000005AC  48C0                     ext.l      D0
  526. 000005AE  81FC 0020                divs.w     D0, 0x20 /* ' ' */
  527. 000005B2  3F00                     move.w     -[A7], D0
  528. 000005B4  2F3C 0007 0000           move.l     -[A7], 0x70000
  529. 000005BA  4EAD 245A                jsr        [A5 + 0x245A /* export_1159 */]
  530. 000005BE  3D5F FFF8                move.w     [A6 - 0x8], [A7]+
  531. 000005C2  2F0E                     move.l     -[A7], A6
  532. 000005C4  4EBA FEAA                jsr        [PC - 0x156 /* 00000470 */]
  533. 000005C8  302E FFF6                move.w     D0, [A6 - 0xA]
  534. 000005CC  5240                     addq.w     D0, 1
  535. 000005CE  322E FFF8                move.w     D1, [A6 - 0x8]
  536. 000005D2  E541                     asl        D1.w, 2
  537. 000005D4  D240                     add.w      D1, D0
  538. 000005D6  3B41 BAEE                move.w     [A5 - 0x4512], D1
  539. 000005DA  2F2D B660                move.l     -[A7], [A5 - 0x49A0]
  540. 000005DE  A873                     syscall    SetPort
  541. 000005E0  4EAD 2232                jsr        [A5 + 0x2232 /* export_1090 */]
  542. label000005E4:
  543. 000005E4  7001                     moveq.l    D0, 0x01
  544. 000005E6  B06E FFFA                cmp.w      D0, [A6 - 0x6]
  545. 000005EA  57C0                     seq        D0
  546. 000005EC  7202                     moveq.l    D1, 0x02
  547. 000005EE  B26E FFFA                cmp.w      D1, [A6 - 0x6]
  548. 000005F2  57C1                     seq        D1
  549. 000005F4  8001                     or.b       D0, D1
  550. 000005F6  6700 FF6A                beq        -0x94 /* 00000562 */
  551. label000005FA:
  552. 000005FA  486E FFF2                pea.l      [A6 - 0xE]
  553. 000005FE  4EAD 202A                jsr        [A5 + 0x202A /* export_1025 */]
  554. 00000602  4267                     clr.w      -[A7]
  555. 00000604  4EAD 206A                jsr        [A5 + 0x206A /* export_1033 */]
  556. 00000608  101F                     move.b     D0, [A7]+
  557. 0000060A  0A00 0001                xori.b     D0, 0x1
  558. 0000060E  67EA                     beq        -0x14 /* 000005FA */
  559. 00000610  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  560. 00000614  4EAD 1CAA                jsr        [A5 + 0x1CAA /* export_913 */]
  561. 00000618  486E FFFC                pea.l      [A6 - 0x4]
  562. 0000061C  4EAD 2AFA                jsr        [A5 + 0x2AFA /* export_1371 */]
  563. 00000620  1B7C 0001 B24C           move.b     [A5 - 0x4DB4], 0x1
  564. 00000626  7007                     moveq.l    D0, 0x07
  565. 00000628  B06D BB1C                cmp.w      D0, [A5 - 0x44E4]
  566. 0000062C  6708                     beq        +0xA /* 00000636 */
  567. 0000062E  3F3C 0007                move.w     -[A7], 0x7
  568. 00000632  4EAD 005A                jsr        [A5 + 0x5A /* export_7 */]
  569. label00000636:
  570. 00000636  4CDF 00E0                movem.l    D5,D6,D7, [A7]+
  571. 0000063A  4E5E                     unlink     A6
  572. 0000063C  4E75                     rts
  573. fn0000063E:
  574. 0000063E  4E56 FFFC                link       A6, -0x0004
  575. 00000642  48E7 0308                movem.l    -[A7], D6,D7,A4
  576. 00000646  286E 0008                movea.l    A4, [A6 + 0x8]
  577. 0000064A  206C FFFC                movea.l    A0, [A4 - 0x4]
  578. 0000064E  43EC FFEA                lea.l      A1, [A4 - 0x16]
  579. 00000652  41E8 0010                lea.l      A0, [A0 + 0x10]
  580. 00000656  22D8                     move.l     [A1]+, [A0]+
  581. 00000658  22D8                     move.l     [A1]+, [A0]+
  582. 0000065A  486C FFEA                pea.l      [A4 - 0x16]
  583. 0000065E  2F3C 000C 0000           move.l     -[A7], 0xC0000
  584. 00000664  A8A9                     syscall    InsetRect
  585. 00000666  302C FFF8                move.w     D0, [A4 - 0x8]
  586. 0000066A  C1EC FFFA                muls.w     D0, [A4 - 0x6]
  587. 0000066E  3C00                     move.w     D6, D0
  588. 00000670  302C FFF8                move.w     D0, [A4 - 0x8]
  589. 00000674  5340                     subq.w     D0, 1
  590. 00000676  41ED B7B0                lea.l      A0, [A5 - 0x4850]
  591. 0000067A  D040                     add.w      D0, D0
  592. 0000067C  3E30 0000                move.w     D7, [A0 + D0.w]
  593. 00000680  3007                     move.w     D0, D7
  594. 00000682  48C0                     ext.l      D0
  595. 00000684  81FC 0002                divs.w     D0, 0x2
  596. 00000688  3206                     move.w     D1, D6
  597. 0000068A  9240                     sub.w      D1, D0
  598. 0000068C  3941 FFEC                move.w     [A4 - 0x14], D1
  599. 00000690  3007                     move.w     D0, D7
  600. 00000692  D06C FFEC                add.w      D0, [A4 - 0x14]
  601. 00000696  3940 FFF0                move.w     [A4 - 0x10], D0
  602. 0000069A  4CDF 10C0                movem.l    D6,D7,A4, [A7]+
  603. 0000069E  4E5E                     unlink     A6
  604. 000006A0  2E9F                     move.l     [A7], [A7]+
  605. 000006A2  4E75                     rts
  606. fn000006A4:
  607. 000006A4  4E56 0000                link       A6, 0
  608. 000006A8  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  609. 000006AC  4EBA FF90                jsr        [PC - 0x70 /* 0000063E */]
  610. 000006B0  206E 0008                movea.l    A0, [A6 + 0x8]
  611. 000006B4  4868 FFEA                pea.l      [A0 - 0x16]
  612. 000006B8  2F3C FFF8 FFF6           move.l     -[A7], 0xFFF8FFF6
  613. 000006BE  A8A9                     syscall    InsetRect
  614. 000006C0  206E 0008                movea.l    A0, [A6 + 0x8]
  615. 000006C4  4868 FFEA                pea.l      [A0 - 0x16]
  616. 000006C8  4EAD 0912                jsr        [A5 + 0x912 /* export_286 */]
  617. 000006CC  4E5E                     unlink     A6
  618. 000006CE  2E9F                     move.l     [A7], [A7]+
  619. 000006D0  4E75                     rts
  620. export_762:
  621. 000006D2  4E56 FFEA                link       A6, -0x0016
  622. 000006D6  4EAD 07D2                jsr        [A5 + 0x7D2 /* export_246 */]
  623. 000006DA  4EAD 1D22                jsr        [A5 + 0x1D22 /* export_928 */]
  624. 000006DE  42A7                     clr.l      -[A7]
  625. 000006E0  3F3C 00A5                move.w     -[A7], 0xA5
  626. 000006E4  42A7                     clr.l      -[A7]
  627. 000006E6  70FF                     moveq.l    D0, 0xFFFFFFFF
  628. 000006E8  2F00                     move.l     -[A7], D0
  629. 000006EA  4EAD 1E62                jsr        [A5 + 0x1E62 /* export_968 */]
  630. 000006EE  2D5F FFFC                move.l     [A6 - 0x4], [A7]+
  631. 000006F2  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  632. 000006F6  2F3C 0001 0000           move.l     -[A7], 0x10000
  633. 000006FC  1F3C 0001                move.b     -[A7], 0x1
  634. 00000700  4EAD 1CCA                jsr        [A5 + 0x1CCA /* export_917 */]
  635. 00000704  206E FFFC                movea.l    A0, [A6 - 0x4]
  636. 00000708  43EE FFEA                lea.l      A1, [A6 - 0x16]
  637. 0000070C  41E8 0010                lea.l      A0, [A0 + 0x10]
  638. 00000710  22D8                     move.l     [A1]+, [A0]+
  639. 00000712  22D8                     move.l     [A1]+, [A0]+
  640. 00000714  302E FFF0                move.w     D0, [A6 - 0x10]
  641. 00000718  906E FFEC                sub.w      D0, [A6 - 0x14]
  642. 0000071C  48C0                     ext.l      D0
  643. 0000071E  81FC 0007                divs.w     D0, 0x7
  644. 00000722  3D40 FFFA                move.w     [A6 - 0x6], D0
  645. 00000726  3D7C 0001 FFF8           move.w     [A6 - 0x8], 0x1
  646. 0000072C  6010                     bra        +0x12 /* 0000073E */
  647. label0000072E:
  648. 0000072E  2F0E                     move.l     -[A7], A6
  649. 00000730  4EBA FF0C                jsr        [PC - 0xF4 /* 0000063E */]
  650. 00000734  486E FFEA                pea.l      [A6 - 0x16]
  651. 00000738  A8A2                     syscall    PaintRect
  652. 0000073A  526E FFF8                addq.w     [A6 - 0x8], 1
  653. label0000073E:
  654. 0000073E  7006                     moveq.l    D0, 0x06
  655. 00000740  B06E FFF8                cmp.w      D0, [A6 - 0x8]
  656. 00000744  6CE8                     bge        -0x16 /* 0000072E */
  657. 00000746  3D7C 0001 FFF8           move.w     [A6 - 0x8], 0x1
  658. 0000074C  601A                     bra        +0x1C /* 00000768 */
  659. label0000074E:
  660. 0000074E  302E FFF8                move.w     D0, [A6 - 0x8]
  661. 00000752  5340                     subq.w     D0, 1
  662. 00000754  41ED B7B0                lea.l      A0, [A5 - 0x4850]
  663. 00000758  D040                     add.w      D0, D0
  664. 0000075A  3230 0000                move.w     D1, [A0 + D0.w]
  665. 0000075E  B26D B7AE                cmp.w      D1, [A5 - 0x4852]
  666. 00000762  670C                     beq        +0xE /* 00000770 */
  667. 00000764  526E FFF8                addq.w     [A6 - 0x8], 1
  668. label00000768:
  669. 00000768  7006                     moveq.l    D0, 0x06
  670. 0000076A  B06E FFF8                cmp.w      D0, [A6 - 0x8]
  671. 0000076E  6CDE                     bge        -0x20 /* 0000074E */
  672. label00000770:
  673. 00000770  2F0E                     move.l     -[A7], A6
  674. 00000772  4EBA FF30                jsr        [PC - 0xD0 /* 000006A4 */]
  675. label00000776:
  676. 00000776  486D 1D42                pea.l      [A5 + 0x1D42 /* export_932 */]
  677. 0000077A  486E FFF6                pea.l      [A6 - 0xA]
  678. 0000077E  A991                     syscall    ModalDialog
  679. 00000780  7002                     moveq.l    D0, 0x02
  680. 00000782  B06E FFF6                cmp.w      D0, [A6 - 0xA]
  681. 00000786  6658                     bne        +0x5A /* 000007E0 */
  682. 00000788  2F0E                     move.l     -[A7], A6
  683. 0000078A  4EBA FF18                jsr        [PC - 0xE8 /* 000006A4 */]
  684. 0000078E  486E FFF2                pea.l      [A6 - 0xE]
  685. 00000792  4EAD 202A                jsr        [A5 + 0x202A /* export_1025 */]
  686. 00000796  4267                     clr.w      -[A7]
  687. 00000798  302E FFFA                move.w     D0, [A6 - 0x6]
  688. 0000079C  48C0                     ext.l      D0
  689. 0000079E  81FC 0002                divs.w     D0, 0x2
  690. 000007A2  D06E FFF4                add.w      D0, [A6 - 0xC]
  691. 000007A6  48C0                     ext.l      D0
  692. 000007A8  81EE FFFA                divs.w     D0, [A6 - 0x6]
  693. 000007AC  3F00                     move.w     -[A7], D0
  694. 000007AE  2F3C 0006 0001           move.l     -[A7], 0x60001
  695. 000007B4  4EAD 245A                jsr        [A5 + 0x245A /* export_1159 */]
  696. 000007B8  3D5F FFF8                move.w     [A6 - 0x8], [A7]+
  697. 000007BC  2F0E                     move.l     -[A7], A6
  698. 000007BE  4EBA FEE4                jsr        [PC - 0x11C /* 000006A4 */]
  699. 000007C2  2F2D B660                move.l     -[A7], [A5 - 0x49A0]
  700. 000007C6  A873                     syscall    SetPort
  701. 000007C8  302E FFF8                move.w     D0, [A6 - 0x8]
  702. 000007CC  5340                     subq.w     D0, 1
  703. 000007CE  41ED B7B0                lea.l      A0, [A5 - 0x4850]
  704. 000007D2  D040                     add.w      D0, D0
  705. 000007D4  3F30 0000                move.w     -[A7], [A0 + D0.w]
  706. 000007D8  4EAD 0082                jsr        [A5 + 0x82 /* export_12 */]
  707. 000007DC  4EAD 2232                jsr        [A5 + 0x2232 /* export_1090 */]
  708. label000007E0:
  709. 000007E0  7001                     moveq.l    D0, 0x01
  710. 000007E2  B06E FFF6                cmp.w      D0, [A6 - 0xA]
  711. 000007E6  57C0                     seq        D0
  712. 000007E8  7202                     moveq.l    D1, 0x02
  713. 000007EA  B26E FFF6                cmp.w      D1, [A6 - 0xA]
  714. 000007EE  57C1                     seq        D1
  715. 000007F0  8001                     or.b       D0, D1
  716. 000007F2  6782                     beq        -0x7C /* 00000776 */
  717. label000007F4:
  718. 000007F4  486E FFF2                pea.l      [A6 - 0xE]
  719. 000007F8  4EAD 202A                jsr        [A5 + 0x202A /* export_1025 */]
  720. 000007FC  4267                     clr.w      -[A7]
  721. 000007FE  4EAD 206A                jsr        [A5 + 0x206A /* export_1033 */]
  722. 00000802  101F                     move.b     D0, [A7]+
  723. 00000804  0A00 0001                xori.b     D0, 0x1
  724. 00000808  67EA                     beq        -0x14 /* 000007F4 */
  725. 0000080A  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  726. 0000080E  4EAD 1CAA                jsr        [A5 + 0x1CAA /* export_913 */]
  727. 00000812  486E FFFC                pea.l      [A6 - 0x4]
  728. 00000816  4EAD 2AFA                jsr        [A5 + 0x2AFA /* export_1371 */]
  729. 0000081A  1B7C 0001 B24C           move.b     [A5 - 0x4DB4], 0x1
  730. 00000820  4E5E                     unlink     A6
  731. 00000822  4E75                     rts
  732. fn00000824:
  733. 00000824  4E56 FFF8                link       A6, -0x0008
  734. 00000828  206E 0008                movea.l    A0, [A6 + 0x8]
  735. 0000082C  3028 FFF2                move.w     D0, [A0 - 0xE]
  736. 00000830  907C 0031                sub.w      D0, 0x31 /* '1' */
  737. 00000834  EB40                     asl        D0.w, 5
  738. 00000836  5040                     addq.w     D0, 8
  739. 00000838  3D40 FFFA                move.w     [A6 - 0x6], D0
  740. 0000083C  D07C 0020                add.w      D0, 0x20 /* ' ' */
  741. 00000840  3D40 FFFE                move.w     [A6 - 0x2], D0
  742. 00000844  3D7C 0008 FFF8           move.w     [A6 - 0x8], 0x8
  743. 0000084A  302E FFF8                move.w     D0, [A6 - 0x8]
  744. 0000084E  D07C 0020                add.w      D0, 0x20 /* ' ' */
  745. 00000852  3D40 FFFC                move.w     [A6 - 0x4], D0
  746. 00000856  486E FFF8                pea.l      [A6 - 0x8]
  747. 0000085A  4EAD 0912                jsr        [A5 + 0x912 /* export_286 */]
  748. 0000085E  4E5E                     unlink     A6
  749. 00000860  2E9F                     move.l     [A7], [A7]+
  750. 00000862  4E75                     rts
  751. export_763:
  752. 00000864  4E56 FFEE                link       A6, -0x0012
  753. 00000868  2F07                     move.l     -[A7], D7
  754. 0000086A  4EAD 07D2                jsr        [A5 + 0x7D2 /* export_246 */]
  755. 0000086E  4EAD 1D22                jsr        [A5 + 0x1D22 /* export_928 */]
  756. 00000872  42A7                     clr.l      -[A7]
  757. 00000874  3F3C 00A2                move.w     -[A7], 0xA2
  758. 00000878  42A7                     clr.l      -[A7]
  759. 0000087A  70FF                     moveq.l    D0, 0xFFFFFFFF
  760. 0000087C  2F00                     move.l     -[A7], D0
  761. 0000087E  4EAD 1E62                jsr        [A5 + 0x1E62 /* export_968 */]
  762. 00000882  2D5F FFFC                move.l     [A6 - 0x4], [A7]+
  763. 00000886  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  764. 0000088A  2F3C 0001 0000           move.l     -[A7], 0x10000
  765. 00000890  1F3C 0001                move.b     -[A7], 0x1
  766. 00000894  4EAD 1CCA                jsr        [A5 + 0x1CCA /* export_917 */]
  767. 00000898  4EAD 21F2                jsr        [A5 + 0x21F2 /* export_1082 */]
  768. 0000089C  7E10                     moveq.l    D7, 0x10
  769. 0000089E  3D7C 0031 FFF2           move.w     [A6 - 0xE], 0x31 /* '1' */
  770. 000008A4  6016                     bra        +0x18 /* 000008BC */
  771. label000008A6:
  772. 000008A6  3F07                     move.w     -[A7], D7
  773. 000008A8  3F3C 0020                move.w     -[A7], 0x20 /* ' ' */
  774. 000008AC  A893                     syscall    MoveTo
  775. 000008AE  3F2E FFF2                move.w     -[A7], [A6 - 0xE]
  776. 000008B2  A883                     syscall    DrawChar
  777. 000008B4  DE7C 0020                add.w      D7, 0x20 /* ' ' */
  778. 000008B8  526E FFF2                addq.w     [A6 - 0xE], 1
  779. label000008BC:
  780. 000008BC  7036                     moveq.l    D0, 0x36
  781. 000008BE  B06E FFF2                cmp.w      D0, [A6 - 0xE]
  782. 000008C2  6CE2                     bge        -0x1C /* 000008A6 */
  783. 000008C4  4EAD 2132                jsr        [A5 + 0x2132 /* export_1058 */]
  784. 000008C8  302D B766                move.w     D0, [A5 - 0x489A]
  785. 000008CC  5740                     subq.w     D0, 3
  786. 000008CE  6712                     beq        +0x14 /* 000008E2 */
  787. 000008D0  5340                     subq.w     D0, 1
  788. 000008D2  6716                     beq        +0x18 /* 000008EA */
  789. 000008D4  5340                     subq.w     D0, 1
  790. 000008D6  671A                     beq        +0x1C /* 000008F2 */
  791. 000008D8  5340                     subq.w     D0, 1
  792. 000008DA  671E                     beq        +0x20 /* 000008FA */
  793. 000008DC  5540                     subq.w     D0, 2
  794. 000008DE  6722                     beq        +0x24 /* 00000902 */
  795. 000008E0  6028                     bra        +0x2A /* 0000090A */
  796. label000008E2:
  797. 000008E2  3D7C 0031 FFF2           move.w     [A6 - 0xE], 0x31 /* '1' */
  798. 000008E8  602A                     bra        +0x2C /* 00000914 */
  799. label000008EA:
  800. 000008EA  3D7C 0032 FFF2           move.w     [A6 - 0xE], 0x32 /* '2' */
  801. 000008F0  6022                     bra        +0x24 /* 00000914 */
  802. label000008F2:
  803. 000008F2  3D7C 0033 FFF2           move.w     [A6 - 0xE], 0x33 /* '3' */
  804. 000008F8  601A                     bra        +0x1C /* 00000914 */
  805. label000008FA:
  806. 000008FA  3D7C 0034 FFF2           move.w     [A6 - 0xE], 0x34 /* '4' */
  807. 00000900  6012                     bra        +0x14 /* 00000914 */
  808. label00000902:
  809. 00000902  3D7C 0035 FFF2           move.w     [A6 - 0xE], 0x35 /* '5' */
  810. 00000908  600A                     bra        +0xC /* 00000914 */
  811. label0000090A:
  812. 0000090A  426D B766                clr.w      [A5 - 0x489A]
  813. 0000090E  3D7C 0036 FFF2           move.w     [A6 - 0xE], 0x36 /* '6' */
  814. label00000914:
  815. 00000914  2F0E                     move.l     -[A7], A6
  816. 00000916  4EBA FF0C                jsr        [PC - 0xF4 /* 00000824 */]
  817. label0000091A:
  818. 0000091A  486D 1D42                pea.l      [A5 + 0x1D42 /* export_932 */]
  819. 0000091E  486E FFFA                pea.l      [A6 - 0x6]
  820. 00000922  A991                     syscall    ModalDialog
  821. 00000924  7002                     moveq.l    D0, 0x02
  822. 00000926  B06E FFFA                cmp.w      D0, [A6 - 0x6]
  823. 0000092A  6600 0094                bne        +0x96 /* 000009C0 */
  824. 0000092E  486E FFF4                pea.l      [A6 - 0xC]
  825. 00000932  4EAD 202A                jsr        [A5 + 0x202A /* export_1025 */]
  826. 00000936  2F0E                     move.l     -[A7], A6
  827. 00000938  4EBA FEEA                jsr        [PC - 0x116 /* 00000824 */]
  828. 0000093C  4267                     clr.w      -[A7]
  829. 0000093E  302E FFF6                move.w     D0, [A6 - 0xA]
  830. 00000942  5140                     subq.w     D0, 8
  831. 00000944  48C0                     ext.l      D0
  832. 00000946  81FC 0020                divs.w     D0, 0x20 /* ' ' */
  833. 0000094A  D07C 0031                add.w      D0, 0x31 /* '1' */
  834. 0000094E  3F00                     move.w     -[A7], D0
  835. 00000950  2F3C 0036 0031           move.l     -[A7], 0x360031 /* '6\01' */
  836. 00000956  4EAD 245A                jsr        [A5 + 0x245A /* export_1159 */]
  837. 0000095A  3D5F FFF2                move.w     [A6 - 0xE], [A7]+
  838. 0000095E  2F0E                     move.l     -[A7], A6
  839. 00000960  4EBA FEC2                jsr        [PC - 0x13E /* 00000824 */]
  840. 00000964  302E FFF2                move.w     D0, [A6 - 0xE]
  841. 00000968  0440 0031                subi.w     D0, 0x31 /* '1' */
  842. 0000096C  6B48                     bmi        +0x4A /* 000009B6 */
  843. 0000096E  0C40 0005                cmpi.w     D0, 0x5
  844. 00000972  6E42                     bgt        +0x44 /* 000009B6 */
  845. 00000974  D040                     add.w      D0, D0
  846. 00000976  303B 0006                move.w     D0, [PC + D0.w + 0x6]
  847. 0000097A  4EFB 0000                jmp        [PC + D0.w]
  848. 0000097E  000E 0016                ori.b      A6, 0x16
  849. 00000982  001E 0026                ori.b      [A6]+, 0x26 /* '&' */
  850. 00000986  002E 0036 3B7C           ori.b      [A6 + 0x3B7C], 0x36 /* '6' */
  851. 0000098C  0003 B766                ori.b      D3, 0x66 /* 'f' */
  852. 00000990  6024                     bra        +0x26 /* 000009B6 */
  853. 00000992  3B7C 0004 B766           move.w     [A5 - 0x489A], 0x4
  854. 00000998  601C                     bra        +0x1E /* 000009B6 */
  855. 0000099A  3B7C 0005 B766           move.w     [A5 - 0x489A], 0x5
  856. 000009A0  6014                     bra        +0x16 /* 000009B6 */
  857. 000009A2  3B7C 0006 B766           move.w     [A5 - 0x489A], 0x6
  858. 000009A8  600C                     bra        +0xE /* 000009B6 */
  859. 000009AA  3B7C 0008 B766           move.w     [A5 - 0x489A], 0x8
  860. 000009B0  6004                     bra        +0x6 /* 000009B6 */
  861. 000009B2  426D B766                clr.w      [A5 - 0x489A]
  862. label000009B6:
  863. 000009B6  2F2D B660                move.l     -[A7], [A5 - 0x49A0]
  864. 000009BA  A873                     syscall    SetPort
  865. 000009BC  4EAD 2232                jsr        [A5 + 0x2232 /* export_1090 */]
  866. label000009C0:
  867. 000009C0  7001                     moveq.l    D0, 0x01
  868. 000009C2  B06E FFFA                cmp.w      D0, [A6 - 0x6]
  869. 000009C6  57C0                     seq        D0
  870. 000009C8  7202                     moveq.l    D1, 0x02
  871. 000009CA  B26E FFFA                cmp.w      D1, [A6 - 0x6]
  872. 000009CE  57C1                     seq        D1
  873. 000009D0  8001                     or.b       D0, D1
  874. 000009D2  6700 FF46                beq        -0xB8 /* 0000091A */
  875. label000009D6:
  876. 000009D6  486E FFF4                pea.l      [A6 - 0xC]
  877. 000009DA  4EAD 202A                jsr        [A5 + 0x202A /* export_1025 */]
  878. 000009DE  4267                     clr.w      -[A7]
  879. 000009E0  4EAD 206A                jsr        [A5 + 0x206A /* export_1033 */]
  880. 000009E4  101F                     move.b     D0, [A7]+
  881. 000009E6  0A00 0001                xori.b     D0, 0x1
  882. 000009EA  67EA                     beq        -0x14 /* 000009D6 */
  883. 000009EC  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  884. 000009F0  4EAD 1CAA                jsr        [A5 + 0x1CAA /* export_913 */]
  885. 000009F4  486E FFFC                pea.l      [A6 - 0x4]
  886. 000009F8  4EAD 2AFA                jsr        [A5 + 0x2AFA /* export_1371 */]
  887. 000009FC  1B7C 0001 B24C           move.b     [A5 - 0x4DB4], 0x1
  888. 00000A02  7011                     moveq.l    D0, 0x11
  889. 00000A04  B06D BB1C                cmp.w      D0, [A5 - 0x44E4]
  890. 00000A08  6708                     beq        +0xA /* 00000A12 */
  891. 00000A0A  3F3C 0011                move.w     -[A7], 0x11
  892. 00000A0E  4EAD 005A                jsr        [A5 + 0x5A /* export_7 */]
  893. label00000A12:
  894. 00000A12  2E1F                     move.l     D7, [A7]+
  895. 00000A14  4E5E                     unlink     A6
  896. 00000A16  4E75                     rts
  897.